/ Level 2005 Christmas (DVD) / Level_2005-XMAS_134_DVD_Knightshift.iso / Updates / Land of the Dead / System / GUI.u / GUIComponent_GUINumericEdit_ScriptText.TextBuffer

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 5b 26 2f 2f 20 43 6f 70 |........|[&// Cop|
|00000010| 79 72 69 67 68 74 20 28 | 43 29 20 32 30 30 35 20 |yright (|C) 2005 |
|00000020| 42 72 61 69 6e 62 6f 78 | 20 47 61 6d 65 73 2e 20 |Brainbox| Games. |
|00000030| 41 6c 6c 20 52 69 67 68 | 74 73 20 52 65 73 65 72 |All Righ|ts Reser|
|00000040| 76 65 64 2e 0d 0a 2f 2f | 20 53 65 70 74 65 6d 62 |ved...//| Septemb|
|00000050| 65 72 20 32 37 2c 20 32 | 30 30 35 0d 0a 2f 2f 20 |er 27, 2|005..// |
|00000060| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000070| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000080| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000090| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000000a0| 3d 3d 3d 3d 0d 0a 2f 2f | 09 43 6c 61 73 73 3a 20 |====..//|.Class: |
|000000b0| 47 55 49 2e 20 55 54 32 | 4e 75 6d 65 72 69 63 45 |GUI. UT2|NumericE|
|000000c0| 64 69 74 0d 0a 2f 2f 0d | 0a 2f 2f 20 20 41 20 43 |dit..//.|.//  A C|
|000000d0| 6f 6d 62 69 6e 61 74 69 | 6f 6e 20 6f 66 20 61 6e |ombinati|on of an|
|000000e0| 20 45 64 69 74 42 6f 78 | 20 61 6e 64 20 32 20 73 | EditBox| and 2 s|
|000000f0| 70 69 6e 6e 65 72 73 0d | 0a 2f 2f 0d 0a 2f 2f 20 |pinners.|.//..// |
|00000100| 20 57 72 69 74 74 65 6e | 20 62 79 20 4a 6f 65 20 | Written| by Joe |
|00000110| 57 69 6c 63 6f 78 0d 0a | 2f 2f 20 20 28 63 29 20 |Wilcox..|//  (c) |
|00000120| 32 30 30 32 2c 20 45 70 | 69 63 20 47 61 6d 65 73 |2002, Ep|ic Games|
|00000130| 2c 20 49 6e 63 2e 20 20 | 41 6c 6c 20 52 69 67 68 |, Inc.  |All Righ|
|00000140| 74 73 20 52 65 73 65 72 | 76 65 64 0d 0a 2f 2f 20 |ts Reser|ved..// |
|00000150| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000160| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000170| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000180| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000190| 3d 3d 3d 3d 0d 0a 0d 0a | 63 6c 61 73 73 20 47 55 |====....|class GU|
|000001a0| 49 4e 75 6d 65 72 69 63 | 45 64 69 74 20 65 78 74 |INumeric|Edit ext|
|000001b0| 65 6e 64 73 20 47 55 49 | 4d 75 6c 74 69 43 6f 6d |ends GUI|MultiCom|
|000001c0| 70 6f 6e 65 6e 74 0d 0a | 09 4e 61 74 69 76 65 3b |ponent..|.Native;|
|000001d0| 0d 0a 0d 0a 2f 2f 20 28 | 63 70 70 74 65 78 74 29 |....// (|cpptext)|
|000001e0| 0d 0a 2f 2f 20 28 63 70 | 70 74 65 78 74 29 0d 0a |..// (cp|ptext)..|
|000001f0| 2f 2f 20 28 63 70 70 74 | 65 78 74 29 0d 0a 2f 2f |// (cppt|ext)..//|
|00000200| 20 28 63 70 70 74 65 78 | 74 29 0d 0a 0d 0a 76 61 | (cpptex|t)....va|
|00000210| 72 20 41 75 74 6f 6d 61 | 74 65 64 20 47 55 49 45 |r Automa|ted GUIE|
|00000220| 64 69 74 42 6f 78 20 4d | 79 45 64 69 74 42 6f 78 |ditBox M|yEditBox|
|00000230| 3b 0d 0a 76 61 72 20 41 | 75 74 6f 6d 61 74 65 64 |;..var A|utomated|
|00000240| 20 47 55 49 53 70 69 6e | 6e 65 72 42 75 74 74 6f | GUISpin|nerButto|
|00000250| 6e 20 4d 79 50 6c 75 73 | 3b 0d 0a 76 61 72 20 41 |n MyPlus|;..var A|
|00000260| 75 74 6f 6d 61 74 65 64 | 20 47 55 49 53 70 69 6e |utomated| GUISpin|
|00000270| 6e 65 72 42 75 74 74 6f | 6e 20 4d 79 4d 69 6e 75 |nerButto|n MyMinu|
|00000280| 73 3b 0d 0a 0d 0a 76 61 | 72 28 4d 65 6e 75 29 09 |s;....va|r(Menu).|
|00000290| 73 74 72 69 6e 67 09 09 | 09 09 56 61 6c 75 65 3b |string..|..Value;|
|000002a0| 0d 0a 76 61 72 28 4d 65 | 6e 75 29 09 62 6f 6f 6c |..var(Me|nu).bool|
|000002b0| 09 09 09 09 62 4c 65 66 | 74 4a 75 73 74 69 66 69 |....bLef|tJustifi|
|000002c0| 65 64 3b 0d 0a 76 61 72 | 28 4d 65 6e 75 29 09 69 |ed;..var|(Menu).i|
|000002d0| 6e 74 09 09 09 09 09 4d | 69 6e 56 61 6c 75 65 3b |nt.....M|inValue;|
|000002e0| 0d 0a 76 61 72 28 4d 65 | 6e 75 29 09 69 6e 74 09 |..var(Me|nu).int.|
|000002f0| 09 09 09 09 4d 61 78 56 | 61 6c 75 65 3b 0d 0a 76 |....MaxV|alue;..v|
|00000300| 61 72 28 4d 65 6e 75 29 | 09 69 6e 74 09 09 09 09 |ar(Menu)|.int....|
|00000310| 09 53 74 65 70 3b 0d 0a | 0d 0a 0d 0a 66 75 6e 63 |.Step;..|....func|
|00000320| 74 69 6f 6e 20 49 6e 69 | 74 43 6f 6d 70 6f 6e 65 |tion Ini|tCompone|
|00000330| 6e 74 28 47 55 49 43 6f | 6e 74 72 6f 6c 6c 65 72 |nt(GUICo|ntroller|
|00000340| 20 4d 79 43 6f 6e 74 72 | 6f 6c 6c 65 72 2c 20 47 | MyContr|oller, G|
|00000350| 55 49 43 6f 6d 70 6f 6e | 65 6e 74 20 4d 79 4f 77 |UICompon|ent MyOw|
|00000360| 6e 65 72 29 0d 0a 7b 0d | 0a 0d 0a 09 53 75 70 65 |ner)..{.|....Supe|
|00000370| 72 2e 49 6e 69 74 63 6f | 6d 70 6f 6e 65 6e 74 28 |r.Initco|mponent(|
|00000380| 4d 79 43 6f 6e 74 72 6f | 6c 6c 65 72 2c 20 4d 79 |MyContro|ller, My|
|00000390| 4f 77 6e 65 72 29 3b 0d | 0a 0d 0a 09 4d 79 45 64 |Owner);.|....MyEd|
|000003a0| 69 74 42 6f 78 2e 4f 6e | 43 68 61 6e 67 65 20 3d |itBox.On|Change =|
|000003b0| 20 45 64 69 74 4f 6e 43 | 68 61 6e 67 65 3b 0d 0a | EditOnC|hange;..|
|000003c0| 09 4d 79 45 64 69 74 42 | 6f 78 2e 53 65 74 54 65 |.MyEditB|ox.SetTe|
|000003d0| 78 74 28 56 61 6c 75 65 | 29 3b 0d 0a 09 4d 79 45 |xt(Value|);...MyE|
|000003e0| 64 69 74 42 6f 78 2e 4f | 6e 4b 65 79 45 76 65 6e |ditBox.O|nKeyEven|
|000003f0| 74 20 3d 20 45 64 69 74 | 4b 65 79 45 76 65 6e 74 |t = Edit|KeyEvent|
|00000400| 3b 0d 0a 0d 0a 09 43 61 | 6c 63 4d 61 78 4c 65 6e |;.....Ca|lcMaxLen|
|00000410| 28 29 3b 0d 0a 0d 0a 09 | 4d 79 50 6c 75 73 2e 4f |();.....|MyPlus.O|
|00000420| 6e 43 6c 69 63 6b 20 3d | 20 53 70 69 6e 6e 65 72 |nClick =| Spinner|
|00000430| 50 6c 75 73 43 6c 69 63 | 6b 3b 0d 0a 09 4d 79 50 |PlusClic|k;...MyP|
|00000440| 6c 75 73 2e 46 6f 63 75 | 73 49 6e 73 74 65 61 64 |lus.Focu|sInstead|
|00000450| 20 3d 20 4d 79 45 64 69 | 74 42 6f 78 3b 0d 0a 09 | = MyEdi|tBox;...|
|00000460| 4d 79 4d 69 6e 75 73 2e | 4f 6e 43 6c 69 63 6b 20 |MyMinus.|OnClick |
|00000470| 3d 20 53 70 69 6e 6e 65 | 72 4d 69 6e 75 73 43 6c |= Spinne|rMinusCl|
|00000480| 69 63 6b 3b 0d 0a 09 4d | 79 4d 69 6e 75 73 2e 46 |ick;...M|yMinus.F|
|00000490| 6f 63 75 73 49 6e 73 74 | 65 61 64 20 3d 20 4d 79 |ocusInst|ead = My|
|000004a0| 45 64 69 74 42 6f 78 3b | 0d 0a 0d 0a 20 20 20 20 |EditBox;|....    |
|000004b0| 53 65 74 48 69 6e 74 28 | 48 69 6e 74 29 3b 0d 0a |SetHint(|Hint);..|
|000004c0| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|000004d0| 43 61 6c 63 4d 61 78 4c | 65 6e 28 29 0d 0a 7b 0d |CalcMaxL|en()..{.|
|000004e0| 0a 09 6c 6f 63 61 6c 20 | 69 6e 74 20 64 69 67 69 |..local |int digi|
|000004f0| 74 63 6f 75 6e 74 2c 78 | 3b 0d 0a 0d 0a 09 64 69 |tcount,x|;.....di|
|00000500| 67 69 74 63 6f 75 6e 74 | 3d 31 3b 0d 0a 09 78 3d |gitcount|=1;...x=|
|00000510| 31 30 3b 0d 0a 09 77 68 | 69 6c 65 20 28 78 3c 4d |10;...wh|ile (x<M|
|00000520| 61 78 56 61 6c 75 65 29 | 0d 0a 09 7b 0d 0a 09 09 |axValue)|...{....|
|00000530| 64 69 67 69 74 63 6f 75 | 6e 74 2b 2b 3b 0d 0a 09 |digitcou|nt++;...|
|00000540| 09 78 2a 3d 31 30 3b 0d | 0a 09 7d 0d 0a 0d 0a 09 |.x*=10;.|..}.....|
|00000550| 4d 79 45 64 69 74 42 6f | 78 2e 4d 61 78 57 69 64 |MyEditBo|x.MaxWid|
|00000560| 74 68 20 3d 20 44 69 67 | 69 74 43 6f 75 6e 74 3b |th = Dig|itCount;|
|00000570| 0d 0a 7d 0d 0a 66 75 6e | 63 74 69 6f 6e 20 53 65 |..}..fun|ction Se|
|00000580| 74 56 61 6c 75 65 28 69 | 6e 74 20 56 29 0d 0a 7b |tValue(i|nt V)..{|
|00000590| 0d 0a 09 69 66 20 28 76 | 3c 4d 69 6e 56 61 6c 75 |...if (v|<MinValu|
|000005a0| 65 29 0d 0a 09 09 76 3d | 4d 69 6e 56 61 6c 75 65 |e)....v=|MinValue|
|000005b0| 3b 0d 0a 0d 0a 09 69 66 | 20 28 76 3e 4d 61 78 56 |;.....if| (v>MaxV|
|000005c0| 61 6c 75 65 29 0d 0a 09 | 09 76 3d 4d 61 78 56 61 |alue)...|.v=MaxVa|
|000005d0| 6c 75 65 3b 0d 0a 0d 0a | 09 4d 79 45 64 69 74 42 |lue;....|.MyEditB|
|000005e0| 6f 78 2e 53 65 74 54 65 | 78 74 28 22 22 24 76 29 |ox.SetTe|xt(""$v)|
|000005f0| 3b 0d 0a 7d 0d 0a 0d 0a | 66 75 6e 63 74 69 6f 6e |;..}....|function|
|00000600| 20 62 6f 6f 6c 20 53 70 | 69 6e 6e 65 72 50 6c 75 | bool Sp|innerPlu|
|00000610| 73 43 6c 69 63 6b 28 47 | 55 49 43 6f 6d 70 6f 6e |sClick(G|UICompon|
|00000620| 65 6e 74 20 53 65 6e 64 | 65 72 29 0d 0a 7b 0d 0a |ent Send|er)..{..|
|00000630| 09 6c 6f 63 61 6c 20 69 | 6e 74 20 76 3b 0d 0a 0d |.local i|nt v;...|
|00000640| 0a 09 76 20 3d 20 69 6e | 74 28 56 61 6c 75 65 29 |..v = in|t(Value)|
|00000650| 20 2b 20 53 74 65 70 3b | 0d 0a 09 69 66 20 28 76 | + Step;|...if (v|
|00000660| 3e 4d 61 78 56 61 6c 75 | 65 29 0d 0a 09 20 20 76 |>MaxValu|e)...  v|
|00000670| 20 3d 20 4d 61 78 56 61 | 6c 75 65 3b 0d 0a 0d 0a | = MaxVa|lue;....|
|00000680| 09 4d 79 45 64 69 74 42 | 6f 78 2e 53 65 74 54 65 |.MyEditB|ox.SetTe|
|00000690| 78 74 28 22 22 24 76 29 | 3b 0d 0a 09 72 65 74 75 |xt(""$v)|;...retu|
|000006a0| 72 6e 20 74 72 75 65 3b | 0d 0a 7d 0d 0a 0d 0a 66 |rn true;|..}....f|
|000006b0| 75 6e 63 74 69 6f 6e 20 | 62 6f 6f 6c 20 53 70 69 |unction |bool Spi|
|000006c0| 6e 6e 65 72 4d 69 6e 75 | 73 43 6c 69 63 6b 28 47 |nnerMinu|sClick(G|
|000006d0| 55 49 43 6f 6d 70 6f 6e | 65 6e 74 20 53 65 6e 64 |UICompon|ent Send|
|000006e0| 65 72 29 0d 0a 7b 0d 0a | 09 6c 6f 63 61 6c 20 69 |er)..{..|.local i|
|000006f0| 6e 74 20 76 3b 0d 0a 0d | 0a 09 76 20 3d 20 69 6e |nt v;...|..v = in|
|00000700| 74 28 56 61 6c 75 65 29 | 20 2d 20 53 74 65 70 3b |t(Value)| - Step;|
|00000710| 0d 0a 09 69 66 20 28 76 | 3c 4d 69 6e 56 61 6c 75 |...if (v|<MinValu|
|00000720| 65 29 0d 0a 09 09 76 3d | 4d 69 6e 56 61 6c 75 65 |e)....v=|MinValue|
|00000730| 3b 0d 0a 0d 0a 09 4d 79 | 45 64 69 74 42 6f 78 2e |;.....My|EditBox.|
|00000740| 53 65 74 54 65 78 74 28 | 22 22 24 76 29 3b 0d 0a |SetText(|""$v);..|
|00000750| 09 72 65 74 75 72 6e 20 | 74 72 75 65 3b 0d 0a 7d |.return |true;..}|
|00000760| 0d 0a 0d 0a 66 75 6e 63 | 74 69 6f 6e 20 62 6f 6f |....func|tion boo|
|00000770| 6c 20 45 64 69 74 4b 65 | 79 45 76 65 6e 74 28 6f |l EditKe|yEvent(o|
|00000780| 75 74 20 62 79 74 65 20 | 4b 65 79 2c 20 6f 75 74 |ut byte |Key, out|
|00000790| 20 62 79 74 65 20 53 74 | 61 74 65 2c 20 66 6c 6f | byte St|ate, flo|
|000007a0| 61 74 20 64 65 6c 74 61 | 29 0d 0a 7b 0d 0a 09 69 |at delta|)..{...i|
|000007b0| 66 20 28 20 28 6b 65 79 | 3d 3d 30 78 45 43 29 20 |f ( (key|==0xEC) |
|000007c0| 26 26 20 28 53 74 61 74 | 65 3d 3d 33 29 20 29 0d |&& (Stat|e==3) ).|
|000007d0| 0a 09 7b 0d 0a 09 09 53 | 70 69 6e 6e 65 72 50 6c |..{....S|pinnerPl|
|000007e0| 75 73 43 6c 69 63 6b 28 | 6e 6f 6e 65 29 3b 0d 0a |usClick(|none);..|
|000007f0| 09 09 72 65 74 75 72 6e | 20 74 72 75 65 3b 0d 0a |..return| true;..|
|00000800| 09 7d 0d 0a 0d 0a 09 69 | 66 20 28 20 28 6b 65 79 |.}.....i|f ( (key|
|00000810| 3d 3d 30 78 45 44 29 20 | 26 26 20 28 53 74 61 74 |==0xED) |&& (Stat|
|00000820| 65 3d 3d 33 29 20 29 0d | 0a 09 7b 0d 0a 09 09 53 |e==3) ).|..{....S|
|00000830| 70 69 6e 6e 65 72 4d 69 | 6e 75 73 43 6c 69 63 6b |pinnerMi|nusClick|
|00000840| 28 6e 6f 6e 65 29 3b 0d | 0a 09 09 72 65 74 75 72 |(none);.|...retur|
|00000850| 6e 20 74 72 75 65 3b 0d | 0a 09 7d 0d 0a 0d 0a 09 |n true;.|..}.....|
|00000860| 72 65 74 75 72 6e 20 4d | 79 45 64 69 74 42 6f 78 |return M|yEditBox|
|00000870| 2e 49 6e 74 65 72 6e 61 | 6c 4f 6e 4b 65 79 45 76 |.Interna|lOnKeyEv|
|00000880| 65 6e 74 28 4b 65 79 2c | 53 74 61 74 65 2c 44 65 |ent(Key,|State,De|
|00000890| 6c 74 61 29 3b 0d 0a 7d | 0d 0a 0d 0a 66 75 6e 63 |lta);..}|....func|
|000008a0| 74 69 6f 6e 20 45 64 69 | 74 4f 6e 43 68 61 6e 67 |tion Edi|tOnChang|
|000008b0| 65 28 47 55 49 43 6f 6d | 70 6f 6e 65 6e 74 20 53 |e(GUICom|ponent S|
|000008c0| 65 6e 64 65 72 29 0d 0a | 7b 0d 0a 09 56 61 6c 75 |ender)..|{...Valu|
|000008d0| 65 20 3d 20 4d 79 45 64 | 69 74 42 6f 78 2e 54 65 |e = MyEd|itBox.Te|
|000008e0| 78 74 53 74 72 3b 0d 0a | 20 20 20 20 4f 6e 43 68 |xtStr;..|    OnCh|
|000008f0| 61 6e 67 65 28 53 65 6e | 64 65 72 29 3b 0d 0a 7d |ange(Sen|der);..}|
|00000900| 0d 0a 0d 0a 66 75 6e 63 | 74 69 6f 6e 20 53 65 74 |....func|tion Set|
|00000910| 48 69 6e 74 28 73 74 72 | 69 6e 67 20 4e 65 77 48 |Hint(str|ing NewH|
|00000920| 69 6e 74 29 0d 0a 7b 0d | 0a 09 6c 6f 63 61 6c 20 |int)..{.|..local |
|00000930| 69 6e 74 20 69 3b 0d 0a | 09 53 75 70 65 72 2e 53 |int i;..|.Super.S|
|00000940| 65 74 48 69 6e 74 28 4e | 65 77 48 69 6e 74 29 3b |etHint(N|ewHint);|
|00000950| 0d 0a 0d 0a 20 20 20 20 | 66 6f 72 20 28 69 3d 30 |....    |for (i=0|
|00000960| 3b 69 3c 43 6f 6e 74 72 | 6f 6c 73 2e 4c 65 6e 67 |;i<Contr|ols.Leng|
|00000970| 74 68 3b 69 2b 2b 29 0d | 0a 20 20 20 20 09 43 6f |th;i++).|.    .Co|
|00000980| 6e 74 72 6f 6c 73 5b 69 | 5d 2e 53 65 74 48 69 6e |ntrols[i|].SetHin|
|00000990| 74 28 4e 65 77 48 69 6e | 74 29 3b 0d 0a 7d 0d 0a |t(NewHin|t);..}..|
|000009a0| 0d 0a 0d 0a 00          |                         |.....   |        |
+--------+-------------------------+-------------------------+--------+--------+